home *** CD-ROM | disk | FTP | other *** search
/ Swimwear Illustrated / Swimwear Illustrated.iso / mac / MAIN8 / CIARA8.DIR / 00026_Script_26 < prev    next >
Text File  |  1996-02-22  |  664b  |  39 lines
  1. on startmovie
  2.   global spplace 
  3.   put 50 into spplace
  4. end startmovie
  5.  
  6. on getroll
  7.   repeat with x = 6 to 9
  8.     if rollover(x) then exit repeat
  9.   end repeat
  10.   if rollover(x) then return x
  11.   else return 50
  12. end if
  13. end getroll
  14.  
  15.  
  16. on rollme
  17. global spplace
  18. if not soundbusy(1) then
  19. sound stop 1
  20. sound playfile 1, "ciara.aif"
  21. end if
  22.  
  23.  
  24.  
  25. put getroll() into spplace
  26.  
  27. if spplace <> 50 then
  28. repeat with group = 6 to 9
  29. SET the VISIBLE OF sprite group+4 to false
  30. end repeat
  31. SET the VISIBLE OF sprite spplace+4 to true
  32. else
  33. repeat with group = 6 to 9
  34. SET the VISIBLE OF sprite group+4 to false
  35. end repeat
  36. end if
  37. UPDATESTAGE
  38. go loop
  39. end rollme